TeX 1995 July/TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO/macros/plain/contrib/springer/singlep/singlep.cmm

Text File | 1991-12-08 | 33.0 KB | 760 lines

% This is SINGLEP.CMM, the plain TeX macro package
% (CM version) from Springer-Verlag
% for single author books in physics
% version of May 1989
\font \tenbfne                = cmb10
\font \eightbf                = cmbx8
\font \eightbfne              = cmb10 at 8pt
\font \eighti                 = cmmi8
\font \cmmiptx                = cmmi10
\font \cmmiptiix              = cmmi8
\font \eightit                = cmti8
\font \eightrm                = cmr8
\font \eightsans              = cmss10 at 8pt
\font \eightsl                = cmsl8
\font \eightsy                = cmsy8
\font \eighttt                = cmtt8
\font \fivesans               = cmss10 at 5pt
\font \kk                     = cmmi6
\font \kla                    = cmr8
\font \markfont               = cmr10 scaled\magstep1
\font \subhfont               = cmr10 scaled\magstep4
\font \sevensans              = cmss10 at 7pt
\font \sixbf                  = cmbx6
\font \sixbfne                = cmb10 at 6pt
\font \sevenbfne              = cmb10 at 7pt
\font \fivebfne               = cmb10 at 5pt
\font \sixi                   = cmmi6
\font \sixrm                  = cmr6
\font \authfont               = cmr17 scaled\magstep2
\font \headfont               = cmbx12 scaled\magstep4
\font \sixsans                = cmss10 at 6pt
\font \sixsy                  = cmsy6
\font \smallescriptfont       = cmr5 at 7pt
\font \smallescriptscriptfont = cmr5
\font \smalletextfont         = cmr5 at 10pt
\font \tafontt                = cmbx10 scaled\magstep2
\font \tafonts                = cmbx7  scaled\magstep2
\font \tafontss               = cmbx5  scaled\magstep2
\font \tamt                   = cmmib10 scaled\magstep2
\font \tams                   = cmmib10
\font \tamss                  = cmmib10 scaled 700
\font \tast                   = cmsy10 scaled\magstep2
\font \tass                   = cmsy7  scaled\magstep2
\font \tasss                  = cmsy5  scaled\magstep2
\font \tasyt                  = cmex10 scaled\magstep2
\font \tasys                  = cmex10 scaled\magstep1
\font \tbfontt                = cmbx10 scaled\magstep1
\font \tbfonts                = cmbx7  scaled\magstep1
\font \tbfontss               = cmbx5  scaled\magstep1
\font \tbmt                   = cmmib10 scaled\magstep1
\font \tbms                   = cmmib10 scaled 833
\font \tbmss                  = cmmib10 scaled 600
\font \tbst                   = cmsy10 scaled\magstep1
\font \tbss                   = cmsy7  scaled\magstep1
\font \tbsss                  = cmsy5  scaled\magstep1
\font \tensans                = cmss10
%--------------------------------------------------------------
\magnification=\magstep1
%\vsize=19.4cm     %ERGEBNISFORMAT
%\hsize=14.4truecm %ERGEBNISFORMAT
\hfuzz=2pt
\vsize=19.0cm     %GROSSHANDBUCH
\hsize=13.8truecm     %GROSSHANDBUCH
\tolerance=500
\abovedisplayskip=3 mm plus6pt minus 4pt
\belowdisplayskip=3 mm plus6pt minus 4pt
\abovedisplayshortskip=0mm plus6pt minus 2pt
\belowdisplayshortskip=2 mm plus4pt minus 4pt
\predisplaypenalty=0
\clubpenalty=10000
\widowpenalty=10000
\frenchspacing
\parindent=1.5em
\newdimen\oldparindent\oldparindent\parindent
%--------------------------------------------------------------------------
\def\bf{\fam\bffam\tenbfne}% bf-fonts
\textfont\bffam=\tenbfne \scriptfont\bffam=\sevenbfne
\scriptscriptfont\bffam=\fivebfne
% petit-fonts
\skewchar\eighti='177 \skewchar\sixi='177
\skewchar\eightsy='60 \skewchar\sixsy='60
\hyphenchar\eighttt=-1
\def\newline{\hfil\break}%
%===============================================================================
% Alle Formeln linksbuendig setzen
%===============================================================================
\newtoks\eq\newtoks\eqn
\catcode`@=11
\def\folio{\ifnum\pageno<\z@
\uppercase\expandafter{\romannumeral-\pageno}%
\else\number\pageno \fi}
\newdimen\mathhsize
\mathhsize=\hsize
\advance\mathhsize by-\parindent
\def\eqalign#1{\null\vcenter{\openup\jot\m@th
  \ialign{\strut\hfil$\displaystyle{##}$&$\displaystyle{{}##}$\hfil
      \crcr#1\crcr}}}
\def\displaylines#1{{}$\displ@y
\hbox{\vbox{\halign{$\@lign\hfil\displaystyle##\hfil$\crcr
    #1\crcr}}}${}}
\def\eqalignno#1{{}$\displ@y
  \hbox{\vbox{\halign
to\mathhsize{\hfil$\@lign\displaystyle{##}$\tabskip\z@skip
    &$\@lign\displaystyle{{}##}$\hfil\tabskip\centering
    &\llap{$\@lign##$}\tabskip\z@skip\crcr
    #1\crcr}}}${}}
\def\leqalignno#1{{}$\displ@y
\hbox{\vbox{\halign
to\mathhsize{\qquad\hfil$\@lign\displaystyle{##}$\tabskip\z@skip
    &$\@lign\displaystyle{{}##}$\hfil\tabskip\centering
    &\kern-\hsize\rlap{$\@lign##$}\tabskip\hsize\crcr
    #1\crcr}}}${}}
\def\generaldisplay{%
\ifeqno
       \ifleqno\leftline{$\displaystyle\the\eqn\quad\the\eq$}%
       \else\noindent\kern\oldparindent\hbox to\mathhsize{$\displaystyle
             \the\eq\hfill\the\eqn$}%
       \fi
\else
       \kern\oldparindent
       \hbox to\mathhsize{$\displaystyle\the\eq$\hss}%
\fi
\global\eq={}\global\eqn={}}%
\newif\ifeqno\newif\ifleqno \everydisplay{\displaysetup}
\def\displaysetup#1$${\displaytest#1\eqno\eqno\displaytest}
\def\displaytest#1\eqno#2\eqno#3\displaytest{%
\if!#3!\ldisplaytest#1\leqno\leqno\ldisplaytest
\else\eqnotrue\leqnofalse\eqn={#2}\eq={#1}\fi
\generaldisplay$$}
\def\ldisplaytest#1\leqno#2\leqno#3\ldisplaytest{\eq={#1}%
\if!#3!\eqnofalse\else\eqnotrue\leqnotrue\eqn={#2}\fi}
\catcode`@=12 % at signs are no longer letters
%-------------------------------------------------------
% Definition der versal griechischen Buchstaben
%============================================================================
  \mathchardef\Gamma="0100
  \mathchardef\Delta="0101
  \mathchardef\Theta="0102
  \mathchardef\Lambda="0103
  \mathchardef\Xi="0104
  \mathchardef\Pi="0105
  \mathchardef\Sigma="0106
  \mathchardef\Upsilon="0107
  \mathchardef\Phi="0108
  \mathchardef\Psi="0109
  \mathchardef\Omega="010A
  \mathchardef\Ohm="000A
%---------------------------------------------------------------------------
\def\AA{{\ooalign{\hfil\raise0.35ex\hbox{\rm\char'27}\hfil\crcr
\hbox{\rm A}}}}
\def\ne{\not\mkern2mu=}
\def\hbar{{\textfont1=\cmmiptx\mathchar'26\mkern-9muh}}
\def\sun{\hbox{$\odot$}}
\def\la{\mathrel{\mathchoice {\vcenter{\offinterlineskip\halign{\hfil
$\displaystyle##$\hfil\cr<\cr\sim\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\textstyle##$\hfil\cr<\cr\sim\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptstyle##$\hfil\cr<\cr\sim\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptscriptstyle##$\hfil\cr<\cr
\sim\cr}}}}}
\def\ga{\mathrel{\mathchoice {\vcenter{\offinterlineskip\halign{\hfil
$\displaystyle##$\hfil\cr>\cr\sim\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\textstyle##$\hfil\cr>\cr\sim\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptstyle##$\hfil\cr>\cr\sim\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptscriptstyle##$\hfil\cr>\cr
\sim\cr}}}}}
\def\sq{\hbox{\rlap{$\sqcap$}$\sqcup$}}
\def\degr{\hbox{$^\circ$}}
\def\arcmin{\hbox{$^\prime$}}
\def\arcsec{\hbox{$^{\prime\prime}$}}
\def\utw{\smash{\rlap{\lower5pt\hbox{$\sim$}}}}
\def\udtw{\smash{\rlap{\lower6pt\hbox{$\approx$}}}}
\def\fd{\hbox{$.\!\!^{\rm d}$}}
\def\fh{\hbox{$.\!\!^{\rm h}$}}
\def\fm{\hbox{$.\!\!^{\rm m}$}}
\def\fs{\hbox{$.\!\!^{\rm s}$}}
\def\fdg{\hbox{$.\!\!^\circ$}}
\def\farcm{\hbox{$.\mkern-4mu^\prime$}}
\def\farcs{\hbox{$.\!\!^{\prime\prime}$}}
\def\fp{\hbox{$.\!\!^{\scriptscriptstyle\rm p}$}}
\def\getsto{\mathrel{\mathchoice {\vcenter{\offinterlineskip\halign{\hfil
$\displaystyle##$\hfil\cr\gets\cr\to\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\textstyle##$\hfil\cr\gets\cr\to\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptstyle##$\hfil\cr\gets\cr
\to\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptscriptstyle##$\hfil\cr\gets
\cr\to\cr}}}}}
\def\cor{\mathrel{\mathchoice {\hbox{$\widehat=$}}{\hbox{$\widehat=$}}
{\hbox{$\scriptstyle\hat=$}}
{\hbox{$\scriptscriptstyle\hat=$}}}}
\def\grole{\mathrel{\mathchoice {\vcenter{\offinterlineskip\halign{\hfil
$\displaystyle##$\hfil\cr>\cr\noalign{\vskip-1.5pt}<\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\textstyle##$\hfil\cr
>\cr\noalign{\vskip-1.5pt}<\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptstyle##$\hfil\cr
>\cr\noalign{\vskip-1pt}<\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptscriptstyle##$\hfil\cr
>\cr\noalign{\vskip-0.5pt}<\cr}}}}}
\def\lid{\mathrel{\mathchoice {\vcenter{\offinterlineskip\halign{\hfil
$\displaystyle##$\hfil\cr<\cr=\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\textstyle##$\hfil\cr<\cr=\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptstyle##$\hfil\cr<\cr=\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptscriptstyle##$\hfil\cr<\cr
=\cr}}}}}
\def\gid{\mathrel{\mathchoice {\vcenter{\offinterlineskip\halign{\hfil
$\displaystyle##$\hfil\cr>\cr=\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\textstyle##$\hfil\cr>\cr=\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptstyle##$\hfil\cr>\cr=\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptscriptstyle##$\hfil\cr>\cr
=\cr}}}}}
\def\sol{\mathrel{\mathchoice {\vcenter{\offinterlineskip\halign{\hfil
$\displaystyle##$\hfil\cr\sim\cr<\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\textstyle##$\hfil\cr\sim\cr<\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptstyle##$\hfil\cr\sim\cr<\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptscriptstyle##$\hfil\cr\sim
\cr<\cr}}}}}
\def\sog{\mathrel{\mathchoice {\vcenter{\offinterlineskip\halign{\hfil
$\displaystyle##$\hfil\cr\sim\cr>\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\textstyle##$\hfil\cr\sim\cr>\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptstyle##$\hfil\cr\sim\cr>\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptscriptstyle##$\hfil\cr\sim
\cr>\cr}}}}}
\def\lse{\mathrel{\mathchoice {\vcenter{\offinterlineskip\halign{\hfil
$\displaystyle##$\hfil\cr<\cr\simeq\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\textstyle##$\hfil\cr<\cr\simeq\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptstyle##$\hfil\cr<\cr\simeq
\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptscriptstyle##$\hfil\cr<\cr
\simeq\cr}}}}}
\def\gse{\mathrel{\mathchoice {\vcenter{\offinterlineskip\halign{\hfil
$\displaystyle##$\hfil\cr>\cr\simeq\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\textstyle##$\hfil\cr>\cr\simeq\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptstyle##$\hfil\cr>\cr\simeq
\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptscriptstyle##$\hfil\cr>\cr
\simeq\cr}}}}}
\def\grole{\mathrel{\mathchoice {\vcenter{\offinterlineskip\halign{\hfil
$\displaystyle##$\hfil\cr>\cr\noalign{\vskip-1.5pt}<\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\textstyle##$\hfil\cr
>\cr\noalign{\vskip-1.5pt}<\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptstyle##$\hfil\cr
>\cr\noalign{\vskip-1pt}<\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptscriptstyle##$\hfil\cr
>\cr\noalign{\vskip-0.5pt}<\cr}}}}}
\def\leogr{\mathrel{\mathchoice {\vcenter{\offinterlineskip\halign{\hfil
$\displaystyle##$\hfil\cr<\cr\noalign{\vskip-1.5pt}>\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\textstyle##$\hfil\cr
<\cr\noalign{\vskip-1.5pt}>\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptstyle##$\hfil\cr
<\cr\noalign{\vskip-1pt}>\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptscriptstyle##$\hfil\cr
<\cr\noalign{\vskip-0.5pt}>\cr}}}}}
\def\loa{\mathrel{\mathchoice {\vcenter{\offinterlineskip\halign{\hfil
$\displaystyle##$\hfil\cr<\cr\approx\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\textstyle##$\hfil\cr<\cr\approx
\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptstyle##$\hfil\cr<\cr\approx
\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptscriptstyle##$\hfil\cr<\cr
\approx\cr}}}}}
\def\goa{\mathrel{\mathchoice {\vcenter{\offinterlineskip\halign{\hfil
$\displaystyle##$\hfil\cr>\cr\approx\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\textstyle##$\hfil\cr>\cr\approx
\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptstyle##$\hfil\cr>\cr\approx
\cr}}}
{\vcenter{\offinterlineskip\halign{\hfil$\scriptscriptstyle##$\hfil\cr>\cr
\approx\cr}}}}}
\def\diameter{{\ifmmode\mathchoice
{\ooalign{\hfil\hbox{$\displaystyle/$}\hfil\crcr
{\hbox{$\displaystyle\mathchar"20D$}}}}
{\ooalign{\hfil\hbox{$\textstyle/$}\hfil\crcr
{\hbox{$\textstyle\mathchar"20D$}}}}
{\ooalign{\hfil\hbox{$\scriptstyle/$}\hfil\crcr
{\hbox{$\scriptstyle\mathchar"20D$}}}}
{\ooalign{\hfil\hbox{$\scriptscriptstyle/$}\hfil\crcr
{\hbox{$\scriptscriptstyle\mathchar"20D$}}}}
\else{\ooalign{\hfil/\hfil\crcr\mathhexbox20D}}%
\fi}}
\def\bbbr{{\rm I\!R}} %reelle Zahlen
\def\bbbm{{\rm I\!M}}
\def\bbbn{{\rm I\!N}} %natuerliche Zahlen
\def\bbbh{{\rm I\!H}}
\def\bbbk{{\rm I\!K}}
\def\bbbp{{\rm I\!P}}
\def\bbbone{{\mathchoice {\rm 1\mskip-4mu l} {\rm 1\mskip-4mu l}
{\rm 1\mskip-4.5mu l} {\rm 1\mskip-5mu l}}}
\def\bbbc{{\mathchoice {\setbox0=\hbox{$\displaystyle\rm C$}\hbox{\hbox
to0pt{\kern0.4\wd0\vrule height0.9\ht0\hss}\box0}}
{\setbox0=\hbox{$\textstyle\rm C$}\hbox{\hbox
to0pt{\kern0.4\wd0\vrule height0.9\ht0\hss}\box0}}
{\setbox0=\hbox{$\scriptstyle\rm C$}\hbox{\hbox
to0pt{\kern0.4\wd0\vrule height0.9\ht0\hss}\box0}}
{\setbox0=\hbox{$\scriptscriptstyle\rm C$}\hbox{\hbox
to0pt{\kern0.4\wd0\vrule height0.9\ht0\hss}\box0}}}}
\def\bbbe{{\mathchoice {\setbox0=\hbox{\smalletextfont e}\hbox{\raise
0.1\ht0\hbox to0pt{\kern0.4\wd0\vrule width0.3pt height0.7\ht0\hss}\box0}}
{\setbox0=\hbox{\smalletextfont e}\hbox{\raise
0.1\ht0\hbox to0pt{\kern0.4\wd0\vrule width0.3pt height0.7\ht0\hss}\box0}}
{\setbox0=\hbox{\smallescriptfont e}\hbox{\raise
0.1\ht0\hbox to0pt{\kern0.5\wd0\vrule width0.2pt height0.7\ht0\hss}\box0}}
{\setbox0=\hbox{\smallescriptscriptfont e}\hbox{\raise
0.1\ht0\hbox to0pt{\kern0.4\wd0\vrule width0.2pt height0.7\ht0\hss}\box0}}}}
\def\bbbq{{\mathchoice {\setbox0=\hbox{$\displaystyle\rm Q$}\hbox{\raise
0.15\ht0\hbox to0pt{\kern0.4\wd0\vrule height0.8\ht0\hss}\box0}}
{\setbox0=\hbox{$\textstyle\rm Q$}\hbox{\raise
0.15\ht0\hbox to0pt{\kern0.4\wd0\vrule height0.8\ht0\hss}\box0}}
{\setbox0=\hbox{$\scriptstyle\rm Q$}\hbox{\raise
0.15\ht0\hbox to0pt{\kern0.4\wd0\vrule height0.7\ht0\hss}\box0}}
{\setbox0=\hbox{$\scriptscriptstyle\rm Q$}\hbox{\raise
0.15\ht0\hbox to0pt{\kern0.4\wd0\vrule height0.7\ht0\hss}\box0}}}}
\def\bbbt{{\mathchoice {\setbox0=\hbox{$\displaystyle\rm
T$}\hbox{\hbox to0pt{\kern0.3\wd0\vrule height0.9\ht0\hss}\box0}}
{\setbox0=\hbox{$\textstyle\rm T$}\hbox{\hbox
to0pt{\kern0.3\wd0\vrule height0.9\ht0\hss}\box0}}
{\setbox0=\hbox{$\scriptstyle\rm T$}\hbox{\hbox
to0pt{\kern0.3\wd0\vrule height0.9\ht0\hss}\box0}}
{\setbox0=\hbox{$\scriptscriptstyle\rm T$}\hbox{\hbox
to0pt{\kern0.3\wd0\vrule height0.9\ht0\hss}\box0}}}}
\def\bbbs{{\mathchoice
{\setbox0=\hbox{$\displaystyle     \rm S$}\hbox{\raise0.5\ht0\hbox
to0pt{\kern0.35\wd0\vrule height0.45\ht0\hss}\hbox
to0pt{\kern0.55\wd0\vrule height0.5\ht0\hss}\box0}}
{\setbox0=\hbox{$\textstyle        \rm S$}\hbox{\raise0.5\ht0\hbox
to0pt{\kern0.35\wd0\vrule height0.45\ht0\hss}\hbox
to0pt{\kern0.55\wd0\vrule height0.5\ht0\hss}\box0}}
{\setbox0=\hbox{$\scriptstyle      \rm S$}\hbox{\raise0.5\ht0\hbox
to0pt{\kern0.35\wd0\vrule height0.45\ht0\hss}\raise0.05\ht0\hbox
to0pt{\kern0.5\wd0\vrule height0.45\ht0\hss}\box0}}
{\setbox0=\hbox{$\scriptscriptstyle\rm S$}\hbox{\raise0.5\ht0\hbox
to0pt{\kern0.4\wd0\vrule height0.45\ht0\hss}\raise0.05\ht0\hbox
to0pt{\kern0.55\wd0\vrule height0.45\ht0\hss}\box0}}}}
\def\bbbz{{\mathchoice {\hbox{$\sans\textstyle Z\kern-0.4em Z$}}
{\hbox{$\sans\textstyle Z\kern-0.4em Z$}}
{\hbox{$\sans\scriptstyle Z\kern-0.3em Z$}}
{\hbox{$\sans\scriptscriptstyle Z\kern-0.2em Z$}}}}
\def\qed{\ifmmode\sq\else{\unskip\nobreak\hfil
\penalty50\hskip1em\null\nobreak\hfil\sq
\parfillskip=0pt\finalhyphendemerits=0\endgraf}\fi}
%---------------------------------------------------------------------------
\newfam\sansfam
\textfont\sansfam=\tensans\scriptfont\sansfam=\sevensans
\scriptscriptfont\sansfam=\fivesans
\def\sans{\fam\sansfam\tensans}
%---------------------------------------------------------------------------
\def\stackfigbox{\if
Y\FIG\global\setbox\figbox=\vbox{\unvbox\figbox\box1}%
\else\global\setbox\figbox=\vbox{\box1}\global\let\FIG=Y\fi}
%
\def\placefigure{\global\let\twolegs=N
\dimen0=\ht1\advance\dimen0by\dp1
\advance\dimen0by5\baselineskip
\advance\dimen0by0.4true cm\relax
\ifdim\dimen0>\vsize\pageinsert
   \box1\vfill\endinsert
\else%keine seitenhohe Abbildung
   \if Y\FIG\stackfigbox
   \else
      \dimen0=\pagetotal
      \advance\dimen0by-6.5\normalbaselineskip\relax
      \ifdim\dimen0<0pt\stackfigbox
      \else\dimen0=\pagetotal\relax
         \ifdim\dimen0<\pagegoal%akt. Seite nicht voll
            \advance\dimen0by\ht1\advance\dimen0by\dp1
            \advance\dimen0by1.4true cm
            \advance\dimen0by5\baselineskip\relax
            \ifdim\dimen0>\pagegoal
               \stackfigbox
            \else
               \vskip1true cm\box1\vskip4true mm
            \fi
         \else
            \vskip1true cm\box1\vskip4true mm
         \fi
      \fi
   \fi
\fi\egroup}
%
\let\twolegs=N
% Abbildungen
\def\begfig#1cm#2\endfig{\par\bgroup
\setbox1=\vbox{\hbox{\vrule height#1true cm}#2}\placefigure}
%
\def\begdoublefig#1cm #2 #3 \enddoublefig{\begfig#1cm\dehnung
\vskip-.8333\baselineskip\line{\vtop{\hsize=6.65true cm#2}\hfill
\global\let\twolegs=N\vtop{\hsize=6.65true cm#3}}\endfig}
%
\def\begfigside#1cm#2cm#3\endfigside{\par\bgroup
\dimen0=#2true cm\relax
\ifdim\dimen0<5.5true cm\message{Room for legend to narrow;
legend will be set raggedright.}\rightskip=0pt plus 2cm\fi
\def\figure##1##2{\vbox{\noindent\petit{\bf
Fig.\ts##1\unskip.\ }\ignorespaces ##2\par}}%
\dimen0=\hsize\advance\dimen0 by-.8true cm\advance\dimen0 by-#2true cm
\setbox1=\vbox{\hbox{\hbox to\dimen0{\vrule
height#1true cm\hrulefill}%
\kern.8true cm\vbox{\hsize=#2true cm#3}}\kern\smallskipamount}\placefigure}
%
\def\begfigsidetop#1cm#2cm#3\endfigsidetop{\dimen0=#2true cm
\ifdim\dimen0<0.4\hsize\message{Room for legend to narrow; begfigsidetop
changed to begfig}\begfig#1cm#3\endfig\else\bgroup
\par\def\figure##1##2{\vbox{\noindent\petit{\bf
Fig.\ts##1\unskip.\ }\ignorespaces ##2\par}}%
\dimen0=\hsize\advance\dimen0 by-.8true cm\advance\dimen0 by-#2true cm
\setbox1=\vbox{\hbox{\hbox to\dimen0{\vrule height#1true cm\hrulefill}%
\kern.8true cm\vbox to#1true cm{\hsize=#2 true cm#3\vfill
}}}\placefigure\fi}
%-------------------------------------------------------------------
\def\dehnung{\spaceskip=\fontdimen2\eightrm\relax
\advance\spaceskip by 0 pt plus 3\fontdimen3\eightrm\relax
\advance\spaceskip by 0 pt minus 3\fontdimen4\eightrm\relax}
% Abbildungslegenden
\def\figure#1#2{\if Y\twolegs\else\vskip6pt\fi
\vbox{\noindent\petit{\bf Fig.\ts#1\unskip.\
}\ignorespaces #2\vskip\normalbaselineskip}\global\let\twolegs=Y}
%-----------------------------------------------------------------
% Tabellenkoepfe
\def\tabcap#1#2{\smallskip\vbox{\noindent\petit{\bf Table\ts#1\unskip.\
}\ignorespaces #2\smallskip}}
%-------------------------------------------------------------------
% Tabellen
\def\begtab#1cm#2\endtab{\par\bgroup
\setbox1=\vbox{#2\par\ifdim#1pt>0pt\hrule width2true cm\kern#1true
cm\hrule width2true cm\fi}\placefigure}
%-------------------------------------------------------------------
\def\begpet{\vskip6pt\bgroup\petit}
\def\endpet{\vskip6pt\egroup}
%-------------------------------------------------------------------
% Referenzen
\newdimen\refindent
\def\begrefchapter#1{\titleb{}{\ignorespaces#1}%
\bgroup\petit
\setbox0=\hbox{1000.\enspace}\refindent=\wd0}
\def\begrefbook#1{\titlea{}{\ignorespaces#1}%
\bgroup\petit
\setbox0=\hbox{1000.\enspace}\refindent=\wd0}
\def\nextchapter#1{\titled{}{\ignorespaces#1}\vskip0.5true cm}
\def\ref{\goodbreak
\hangindent\oldparindent\hangafter=1
\noindent\ignorespaces}
\def\refno#1{\goodbreak
\hangindent\refindent\hangafter=1
\noindent\hbox to\refindent{#1\hss}\ignorespaces}
\def\endref{\goodbreak\endpet}% Ende der Referenzen
%-------------------------------------------------------------------
\def\vec#1{{\textfont1=\tams\scriptfont1=\tamss
\textfont0=\tenbfne\scriptfont0=\sevenbfne
\mathchoice{\hbox{$\displaystyle#1$}}{\hbox{$\textstyle#1$}}
{\hbox{$\scriptstyle#1$}}{\hbox{$\scriptscriptstyle#1$}}}}
%---------------------------------------------------------------------
\def\petit{\def\rm{\fam0\eightrm}%
\textfont0=\eightrm \scriptfont0=\sixrm \scriptscriptfont0=\fiverm
 \textfont1=\eighti \scriptfont1=\sixi \scriptscriptfont1=\fivei
 \textfont2=\eightsy \scriptfont2=\sixsy \scriptscriptfont2=\fivesy
 \def\it{\fam\itfam\eightit}%
 \textfont\itfam=\eightit
 \def\sl{\fam\slfam\eightsl}%
 \textfont\slfam=\eightsl
 \def\bf{\fam\bffam\eightbfne}%
 \textfont\bffam=\eightbfne \scriptfont\bffam=\sixbfne
 \scriptscriptfont\bffam=\fivebfne
 \def\sans{\fam\sansfam\eightsans}%
 \textfont\sansfam=\eightsans \scriptfont\sansfam=\sixsans
 \scriptscriptfont\sansfam=\fivesans
 \def\tt{\fam\ttfam\eighttt}%
 \textfont\ttfam=\eighttt
 \normalbaselineskip=10pt
 \setbox\strutbox=\hbox{\vrule height7pt depth2pt width0pt}%
 \normalbaselines\rm
\let\cmmiptx=\cmmiptiix
\def\vec##1{{\textfont1=\tbms\scriptfont1=\tbmss
\textfont0=\eightbf\scriptfont0=\sixbf
\mathchoice{\hbox{$\displaystyle##1$}}{\hbox{$\textstyle##1$}}
{\hbox{$\scriptstyle##1$}}{\hbox{$\scriptscriptstyle##1$}}}}}
%-------------------------------------------------------------------
% "running head"
\headline={\petit\def\newline{ }\def\fonote#1{}\ifodd\pageno
\hfil\botmark\unskip\kern1.8true cm\llap{\folio}\else\leftheadline\fi}
\def\leftheadline{\rlap{\folio}\kern1.8true cm Missing TITELA\hfil}
\mark{ }
\nopagenumbers
%
% Der Schalter \header gibt an, ob ein "running head" gedruckt werden
% soll; wenn er nicht auf "N" steht kommt ein solcher.
\let\header=Y
\let\FIG=N
\newbox\figbox
\output={\if N\header\headline={\hfil}\fi\plainoutput\global\let\header=Y
\if Y\FIG\topinsert\unvbox\figbox\endinsert\global\let\FIG=N\fi}
%------------------------------------------------------
\def\titlearunning#1{\message{Running head on left hand sides (TITLEA)
has been changed}\gdef\leftheadline{\rlap{\folio}\kern1.8true
cm\ignorespaces#1\hfil}{\def\newline{ }\def\fonote##1{}\mark{#1}}%
\ignorespaces}
\def\titlebrunning#1{\message{Running head on right hand sides (TITLEB)
has been changed}\mark{#1}\ignorespaces}
%------------------------------------------------------
\let\lasttitle=N
%------------------------------------------------------
\def\author#1{\vfill\supereject
     \bgroup
     \baselineskip=22pt
     \lineskip=0pt
     \pretolerance=10000
     \authfont
     \rightskip 0pt plus 6em
     \noindent
     \ignorespaces#1\vskip2true cm\egroup}
\def\head#1#2{\bgroup
     \baselineskip=36pt
     \lineskip=0pt
     \pretolerance=10000
     \headfont
     \rightskip 0pt plus 6em
     \noindent
     \ignorespaces#1\vskip1true cm
     \baselineskip=22pt
     \noindent\subhfont#2\vfill
     \parindent=0pt
     \baselineskip=16pt
     \markfont Springer-Verlag\newline
     Berlin Heidelberg New York\newline
     London Paris Tokyo\par
     \egroup\let\header=N\eject}
% Beginn Ueberschrift 1. Ordnung
\def\titlea#1#2{\vfill\supereject\let\header=N
     \bgroup
\textfont0=\tafontt \scriptfont0=\tafonts \scriptscriptfont0=\tafontss
\textfont1=\tamt \scriptfont1=\tams \scriptscriptfont1=\tamss
\textfont2=\tast \scriptfont2=\tass \scriptscriptfont2=\tasss
\textfont3=\tasyt \scriptfont3=\tasys \scriptscriptfont3=\tenex
     \baselineskip=20pt
     \lineskip=0pt
     \pretolerance=10000
     \tafontt
     \rightskip 0pt plus 6em
     \noindent
     \if!#1!\ignorespaces#2
     \else\setbox0=\hbox{\ignorespaces#1\unskip\
     }\hangindent=\wd0
     \hangafter=1\box0\ignorespaces#2\fi
     \vskip90pt\egroup
     \nobreak
     \parindent=0pt
     \everypar={\global\parindent=\oldparindent
     \global\let\lasttitle=N\global\everypar={}}%
     \global\let\lasttitle=A%
     \setbox0=\hbox{\petit\def\newline{ }\def\fonote##1{}\kern1.8true
     cm\ignorespaces#1\ \ignorespaces#2}\ifdim\wd0>\hsize
     \message{Your TITLEA exceeds the headline, please use a short form with
TITLEARUNNING}\gdef\leftheadline{\rlap{\folio}\kern1.8true cm
TITLEA suppressed due to excessive length\hfil}%
\mark{TITLEA suppressed due to excessive length}%
\else\gdef\leftheadline{\rlap{\folio}\kern1.8true
cm\ignorespaces#1\unskip\
\ignorespaces#2\hfil}{\def\newline{
}\def\fonote##1{}\mark{#1\unskip\ \ignorespaces#2}}\fi
     \ignorespaces}
%------------------------------------------------------
\def\motto#1#2{\vskip-28pt\if M\lasttitle\vskip18pt\fi
\bgroup\petit\leftskip=90pt\noindent\ignorespaces#1
\if!#2!\else\medskip\noindent\it\ignorespaces#2\fi\vskip28pt\egroup
\let\lasttitle=M
\parindent=0pt
\everypar={\global\parindent=\oldparindent
\global\let\lasttitle=N\global\everypar={}}%
\global\let\lasttitle=M%
\ignorespaces}
%------------------------------------------------------
 % Beginn Ueberschrift 2. Ordnung
 \def\titleb#1#2{\if N\lasttitle\else\vskip-28pt
     \fi
     \vskip23pt plus 4pt minus4pt
     \bgroup
\textfont0=\tbfontt \scriptfont0=\tbfonts \scriptscriptfont0=\tbfontss
\textfont1=\tbmt \scriptfont1=\tbms \scriptscriptfont1=\tbmss
\textfont2=\tbst \scriptfont2=\tbss \scriptscriptfont2=\tbsss
\textfont3=\tasys \scriptfont3=\tenex \scriptscriptfont3=\tenex
     \baselineskip=18pt
     \lineskip=18pt
     \pretolerance=10000
     \noindent
     \tbfontt
     \rightskip 0pt plus 6em
     \setbox0=\vbox{\vskip23pt\def\fonote##1{}%
     \noindent
     \if!#1!\ignorespaces#2
     \else\setbox0=\hbox{\ignorespaces#1\unskip\ }\hangindent=\wd0
     \hangafter=1\box0\ignorespaces#2\fi
     \vskip16pt}%
     \dimen0=\pagetotal\advance\dimen0 by-\pageshrink
     \ifdim\dimen0<\pagegoal
     \dimen0=\ht0\advance\dimen0 by\dp0\advance\dimen0 by
     3\normalbaselineskip
     \advance\dimen0 by\pagetotal
     \ifdim\dimen0>\pagegoal\vfill\eject\fi\fi
     \noindent
     \if!#1!\ignorespaces#2
     \else\setbox0=\hbox{\ignorespaces#1\unskip\ }\hangindent=\wd0
     \hangafter=1\box0\ignorespaces#2\fi
     \vskip16pt plus4pt minus4pt\egroup
     \nobreak
     \parindent=0pt
     \everypar={\global\parindent=\oldparindent
     \global\let\lasttitle=N\global\everypar={}}%
     \global\let\lasttitle=B%
     \setbox0=\hbox{\petit\def\newline{ }\def\fonote##1{}\kern1.8true
     cm\ignorespaces#1\unskip\ \ignorespaces#2}\ifdim\wd0>\hsize
     \message{Your TITLEB exceeds the headline, please use a short form with
TITLEBRUNNING}\mark{TITLEB suppressed due to excessive length}%
\else{\def\newline{ }\def\fonote##1{}\mark{#1\unskip\
\ignorespaces#2}}\fi
     \ignorespaces}
%------------------------------------------------------
 % Beginn Ueberschrift 3. Ordnung
 \def\titlec#1#2{\if N\lasttitle\else\vskip-4pt\vskip-\baselineskip
     \fi
     \vskip15pt plus 4pt minus4pt
     \bgroup
     \pretolerance=10000
     \noindent
\textfont0=\tenbf \scriptfont0=\sevenbf \scriptscriptfont0=\fivebf
\textfont1=\tams \scriptfont1=\tamss \scriptscriptfont1=\tbmss
     \tenbf
     \rightskip 0pt plus 6em
     \setbox0=\vbox{\vskip 15pt\def\fonote##1{}%
     \noindent
     \if!#1!\ignorespaces#2
     \else\setbox0=\hbox{\ignorespaces#1\ }\hangindent=\wd0
     \hangafter=1\box0#2\fi
     \vskip8pt}%
     \dimen0=\pagetotal\advance\dimen0 by-\pageshrink
     \ifdim\dimen0<\pagegoal
     \dimen0=\ht0\advance\dimen0 by\dp0\advance\dimen0 by 3\baselineskip
     \advance\dimen0 by\pagetotal
     \ifdim\dimen0>\pagegoal\vfill\eject\fi\fi
     \noindent
     \if!#1!\ignorespaces#2
     \else\setbox0=\hbox{\ignorespaces#1\ }\hangindent=\wd0
     \hangafter=1\box0#2\fi
     \vskip8pt plus4pt minus4pt\egroup
     \nobreak
     \global\let\lasttitle=C%
     \parindent=0pt
     \everypar={\global\parindent=\oldparindent
     \global\let\lasttitle=N\global\everypar={}}%
     \ignorespaces}
%-------------------------------------------------------------------
 % Beginn Ueberschrift 4. Ordnung
 \def\titled#1#2{\if N\lasttitle\else\vskip-3pt\vskip-\baselineskip
     \fi
     \vskip15pt plus 4pt minus 4pt
     \bgroup
\textfont0=\tenbfne \scriptfont0=\sevenbfne \scriptscriptfont0=\fivebfne
\textfont1=\tams \scriptfont1=\tamss \scriptscriptfont1=\tbmss
     \tenbfne
     \noindent
     \if!#1!\else\ignorespaces#1\unskip\ \fi
     \ignorespaces#2\quad\egroup
     \ignorespaces}
%-------------------------------------------------------------------
\let\ts=\thinspace
\def\footnoterule{\kern-3pt\hrule width 2true cm\kern2.6pt}
% Fussnoten-macros
\newcount\footcount \footcount=1
\def\advftncnt{\advance\footcount by1\global\footcount=\footcount}
% Automatisch numerierte Fussnote, Fussnotentex in petit
\def\fonote#1{$^{\the\footcount}$\begingroup\petit
\def\line##1{{\advance\hsize by-0.5\oldparindent\hbox to\hsize{##1}}}%
\advance\mathhsize by-0.5\oldparindent
\def\textindent##1{\hangindent0.5\oldparindent\noindent\hbox
to0.5\oldparindent{##1\hss}\ignorespaces}%
\vfootnote{$^{\the\footcount}$}{#1}\endgroup\advftncnt}
%-------------------------------------------------------------------
\def\item#1{\par\noindent\advance\mathhsize by-6.5mm
\hangindent6.5 mm\hangafter=0
\llap{#1\enspace}\everypar={\global\mathhsize=\hsize
\global\advance\mathhsize by-\oldparindent
\global\everypar={}}\ignorespaces}
%-------------------------------------------------------------------
\def\itemitem#1{\par\noindent\advance\mathhsize by-11.5mm
\hangindent11.5 mm\hangafter=0
\llap{#1\enspace}\everypar={\global\mathhsize=\hsize
\global\advance\mathhsize by-\oldparindent
\global\everypar={}}\ignorespaces}
%-------------------------------------------------------------------
% Appendices
\def\app#1{\titlea{}{Appendix #1}}
%--------------------------------------------------------------------
% Acknowledgement
\long\def\acknow{\titlea{}{Acknowledgements}}
%------------------------------------------------------------------
% Introduction
\def\intro{\titlea{}{Introduction}}
%------------------------------------------------------------------
% Foreword
\def\foreword{\titlea{}{Foreword}}
%------------------------------------------------------------------
% Dedication
\def\dedication{\titlea{}{Dedication}}
%------------------------------------------------------------------
% Contents
\def\contents{\titlea{}{Contents}}
%------------------------------------------------------------------
% Preface
\def\preface{\titlea{}{Preface}}
%--------------------------------------------------------------------
% Lemma
\long\def\lemma#1#2{\removelastskip\vskip\baselineskip\noindent{\tenbfne
Lemma\if!#1!\else\ #1\fi.\quad}\ignorespaces#2\vskip\baselineskip}
% Proposition
\long\def\proposition#1#2{\removelastskip\vskip\baselineskip\noindent{\tenbfne
Proposition\if!#1!\else\ #1\fi.\quad}\ignorespaces#2\vskip\baselineskip}
% Theorem
\long\def\theorem#1#2{\removelastskip\vskip\baselineskip\noindent{\tenbfne
Theorem\if!#1!\else\ #1\fi.\quad}\ignorespaces#2\vskip\baselineskip}
% Corollary
\long\def\corollary#1#2{\removelastskip\vskip\baselineskip\noindent{\tenbfne
Corollary\if!#1!\else\ #1\fi.\quad}\ignorespaces#2\vskip\baselineskip}
% Example
\long\def\example#1#2{\removelastskip\vskip\baselineskip\noindent{\tenbfne
Example\if!#1!\else\ #1\fi.\quad}\ignorespaces#2\vskip\baselineskip}
% Exercise
\long\def\exercise#1#2{\removelastskip\vskip\baselineskip\noindent{\tenbfne
Exercise\if!#1!\else\ #1\fi.\quad}\ignorespaces#2\vskip\baselineskip}
% Problem
\long\def\problem#1#2{\removelastskip\vskip\baselineskip\noindent{\tenbfne
Problem\if!#1!\else\ #1\fi.\quad}\ignorespaces#2\vskip\baselineskip}
% Solution
\long\def\solution#1#2{\removelastskip\vskip\baselineskip\noindent{\tenbfne
Solution\if!#1!\else\ #1\fi.\quad}\ignorespaces#2\vskip\baselineskip}
%Proof:
\long\def\proof{\removelastskip\vskip\baselineskip\noindent{\it
Proof.\quad}\ignorespaces}
%Remark:
\long\def\remark#1#2{\removelastskip\vskip\baselineskip\noindent{\it
Remark\if!#1!\else\ #1\fi.\quad}\ignorespaces#2\vskip\baselineskip}
%Definition:
\long\def\definition#1#2{\removelastskip\vskip\baselineskip\noindent{\tenbfne
Definition\if!#1!\else\
#1\fi.\quad}{\it\ignorespaces#2}\vskip\baselineskip}
%------------------------------------------------------------------
\def\frame#1{\bigskip\vbox{\hrule\hbox{\vrule\kern\parindent
\vbox{\kern5pt\advance\hsize by-0.8pt\advance\hsize by-2\parindent
\advance\mathhsize by-0.8pt\advance\mathhsize by-2\parindent
\centerline{\vbox{\noindent#1}}\kern5pt}\kern\parindent\vrule}\hrule}\bigskip}
%------------------------------------------------------------------
\def\framedformula#1#2{$$\vcenter{\hrule\hbox{\vrule\kern5pt
\vbox{\kern5pt\hbox{$\displaystyle#1$}%
\kern5pt}\kern5pt\vrule}\hrule}\eqno#2$$}
%------------------------------------------------------------------
\def\typeset{\noindent{\petit This book was processed by the author
using the \TeX\ Macropackage from Springer-Verlag.\par}}
\outer\def\byebye{\bigskip\bigskip\typeset
\footcount=1\ifx\speciali\undefined\else
\loop\smallskip\noindent special character No\number\footcount:
\csname special\romannumeral\footcount\endcsname
\advance\footcount by 1\global\footcount=\footcount
\ifnum\footcount<11\repeat\fi
\par\vfill\supereject\end}